home *** CD-ROM | disk | FTP | other *** search
/ Celestin Apprentice 7 / Apprentice-Release7.iso / Source Code / Libraries / SAT 2.4.0 / SAT / Demo ƒ / SATminimal demo ƒ / SATminimal.c < prev    next >
Encoding:
C/C++ Source or Header  |  1996-06-23  |  1.2 KB  |  43 lines  |  [TEXT/KAHL]
  1. #include "SAT.h"
  2.  
  3. /* program SATminimal; */
  4.  
  5. /* MySprite's interface */
  6. extern void InitMySprite();
  7. extern pascal void SetupMySprite (SpritePtr);
  8. extern pascal void HandleMySprite (SpritePtr);
  9.  
  10. void main(void)
  11. {
  12.         SpritePtr ignoreSp;
  13.         long L;
  14.  
  15. /* ThinkC and MWC don't initialize the toolbox automatically, so we ask SAT to do that. */
  16.     SATInitToolbox();
  17.  
  18. /* Initialize, using PICTs 128 or 129 as background, Classic-sized drawing area. */
  19.     SATInit(128, 129, 512, 322);
  20.  
  21. /* Initialize sprite unit(s), by preloading faces and sounds */
  22.     InitMySprite();
  23.  
  24. /* Make a few sprites */
  25.     ignoreSp = SATNewSprite(0, 50, 50, SetupMySprite);
  26.     ignoreSp = SATNewSprite(0, 100, 100, SetupMySprite);
  27.     ignoreSp = SATNewSprite(0, 125, 120, SetupMySprite);
  28.     ignoreSp = SATNewSprite(0, 150, 140, SetupMySprite);
  29.     ignoreSp = SATNewSprite(0, 200, 180, SetupMySprite);
  30.     ignoreSp = SATNewSprite(0, 250, 200, SetupMySprite);
  31.     ignoreSp = SATNewSprite(0, 300, 250, SetupMySprite);
  32.  
  33. /* Run until the user clicks the mouse button  */
  34.     while (!Button())
  35.     {
  36.         L = TickCount();
  37.         SATRun(true); /* Run the animation */
  38.         while (L > TickCount() - 3L) /* Speed limit to 20 fps*/
  39.             ;
  40.     }
  41.     SATSoundShutup(); /* Always make sure the channel is de-allocated */
  42. }
  43.